home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2006 July & August
/
PCWorld_2006-07-08_cd.bin
/
v cisle
/
acehtml
/
acehtmlfreeware.exe
/
acehtmlfree.exe
/
0
/
RCDATA
/
TFRMOPTIMIZER
/
TFRMOPTIMIZER.txt
Wrap
Text File
|
2006-04-19
|
25KB
|
986 lines
object FrmOptimizer: TFrmOptimizer
Left = 218
Top = 140
ClientHeight = 441
ClientWidth = 632
Color = clBtnFace
Constraints.MinWidth = 632
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel: TPanel
Left = 0
Top = 190
Width = 632
Height = 251
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
632
251)
object pcOptimization: TcxPageControl
Left = 5
Top = 5
Width = 519
Height = 221
ActivePage = tsCompression
Anchors = [akLeft, akTop, akRight, akBottom]
LookAndFeel.NativeStyle = True
TabOrder = 0
TabPosition = tpBottom
OnChange = pcOptimizationChange
ClientRectBottom = 197
ClientRectLeft = 2
ClientRectRight = 515
ClientRectTop = 2
object tsCompression: TcxTabSheet
Caption = 'Compression'
object lblStartWith: TLabel
Left = 275
Top = 52
Width = 47
Height = 13
Caption = 'Start with:'
end
object lblEndWith: TLabel
Left = 275
Top = 77
Width = 44
Height = 13
Caption = 'End with:'
end
object cbxStripCR: TCheckBox
Left = 8
Top = 6
Width = 257
Height = 17
Caption = 'Strip Carriage Returns (#10 and #13)'
TabOrder = 0
OnClick = cbxStripCRClick
end
object rbAllCR: TRadioButton
Left = 24
Top = 24
Width = 233
Height = 17
Caption = 'All Carriage Returns'
Checked = True
TabOrder = 1
TabStop = True
end
object rbExtraCR: TRadioButton
Left = 24
Top = 42
Width = 233
Height = 17
Caption = 'Extra Carriage Returns (more than 1)'
TabOrder = 2
end
object cbxStripTabs: TCheckBox
Left = 8
Top = 60
Width = 228
Height = 17
Caption = 'Strip Tabs'
TabOrder = 3
end
object cbxStripHTMLComments: TCheckBox
Left = 8
Top = 137
Width = 240
Height = 17
Caption = 'Strip HTML Comments'
Checked = True
State = cbChecked
TabOrder = 5
end
object cbxCustomRemove: TCheckBox
Left = 275
Top = 6
Width = 240
Height = 17
Caption = 'Custom Remove'
TabOrder = 8
OnClick = cbxCustomRemoveClick
end
object cmbStartWith: TComboBox
Left = 360
Top = 49
Width = 143
Height = 21
ItemHeight = 13
TabOrder = 9
end
object cmbEndWith: TComboBox
Left = 360
Top = 75
Width = 143
Height = 21
ItemHeight = 13
TabOrder = 10
end
object cbxStripExtraSpaces: TCheckBox
Left = 8
Top = 80
Width = 233
Height = 17
Caption = 'Strip Extra Spaces'
Checked = True
State = cbChecked
TabOrder = 4
end
object cbxStripScriptComments: TCheckBox
Left = 8
Top = 158
Width = 240
Height = 17
Caption = 'Strip Script Comments'
Enabled = False
TabOrder = 6
end
object cbxSkipTagCompress: TCheckBox
Left = 275
Top = 158
Width = 233
Height = 17
Caption = 'cbxSkipTagCompress'
Checked = True
State = cbChecked
TabOrder = 13
OnClick = cbxSkipTagCompressClick
end
object cbxStripHTMLTags: TCheckBox
Left = 8
Top = 178
Width = 241
Height = 17
Caption = 'cbxStripHTMLTags'
TabOrder = 7
end
object cbxSkipHTMLTagsCompress: TCheckBox
Left = 275
Top = 116
Width = 241
Height = 17
Caption = 'cbxSkipHTMLTags'
TabOrder = 11
end
object cbxSkipScriptCompress: TCheckBox
Left = 275
Top = 137
Width = 229
Height = 17
Caption = 'cbxSkipScriptCompress'
Checked = True
State = cbChecked
TabOrder = 12
OnClick = cbxSkipTagCompressClick
end
object cbxSkipStringsCompress: TCheckBox
Left = 290
Top = 178
Width = 216
Height = 17
Caption = 'cbxSkipStringsCompress'
Checked = True
Enabled = False
State = cbChecked
TabOrder = 14
end
object cbxStripAllExtraSpaces: TCheckBox
Left = 8
Top = 100
Width = 238
Height = 17
Caption = 'cbxStripAllExtraSpaces'
TabOrder = 15
OnClick = cbxStripAllExtraSpacesClick
end
object cbxCaseSensitive: TCheckBox
Left = 275
Top = 26
Width = 226
Height = 17
Caption = 'cbxCaseSensitive'
TabOrder = 16
end
end
object tsBeautify: TcxTabSheet
Caption = 'Beautify'
ImageIndex = 1
object lblTabs: TLabel
Left = 24
Top = 136
Width = 51
Height = 13
Caption = '&Tab value:'
FocusControl = edTabs
end
object cbxWrapScripts: TCheckBox
Left = 292
Top = 40
Width = 213
Height = 17
Caption = 'Wrap Scripts'
TabOrder = 12
end
object cbxConvertToXHTML: TCheckBox
Left = 273
Top = 16
Width = 232
Height = 17
Caption = 'Convert HTML to XTML'
TabOrder = 11
OnClick = cbxConvertToXHTMLClick
end
object cbxUseSpaces: TCheckBox
Left = 24
Top = 112
Width = 145
Height = 17
Caption = 'Use Spaces'
Checked = True
State = cbChecked
TabOrder = 8
OnClick = cbxUseSpacesClick
end
object edTabs: TEdit
Left = 197
Top = 132
Width = 26
Height = 21
TabOrder = 9
Text = '4'
OnChange = edTabsChange
OnKeyPress = FilterDigits
end
object udTabs: TUpDown
Left = 223
Top = 132
Width = 15
Height = 21
Associate = edTabs
Min = 1
Position = 4
TabOrder = 10
end
object cbxAlignWithTabs: TCheckBox
Left = 8
Top = 88
Width = 201
Height = 17
Caption = 'Align Code with Tabs'
TabOrder = 7
OnClick = cbxAlignWithTabsClick
end
object cbxStripSpacesAfterEOL: TCheckBox
Left = 8
Top = 64
Width = 233
Height = 17
Caption = 'Strip Spaces after EOL'
Checked = True
State = cbChecked
TabOrder = 6
end
object cbxStripMoreSpaces: TCheckBox
Left = 8
Top = 40
Width = 177
Height = 17
Caption = 'Strip Spaces more than:'
Checked = True
State = cbChecked
TabOrder = 3
OnClick = cbxStripMoreSpacesClick
OnKeyPress = FilterDigits
end
object cbxStripMoreCR: TCheckBox
Left = 8
Top = 16
Width = 177
Height = 17
Caption = 'Strip Carriage Returns more than:'
Checked = True
State = cbChecked
TabOrder = 0
OnClick = cbxStripMoreCRClick
OnKeyPress = FilterDigits
end
object edMoreCR: TEdit
Left = 198
Top = 14
Width = 24
Height = 21
TabOrder = 1
Text = '1'
OnChange = edMoreCRChange
end
object edMoreSpaces: TEdit
Left = 197
Top = 39
Width = 26
Height = 21
TabOrder = 4
Text = '1'
OnChange = edMoreSpacesChange
end
object udSpaces: TUpDown
Left = 223
Top = 39
Width = 15
Height = 21
Associate = edMoreSpaces
Min = 1
Max = 1000
Position = 1
TabOrder = 5
end
object udCR: TUpDown
Left = 222
Top = 14
Width = 15
Height = 21
Associate = edMoreCR
Min = 1
Max = 1000
Position = 1
TabOrder = 2
end
object cbxSkipTagBeauty: TCheckBox
Left = 292
Top = 64
Width = 200
Height = 17
Caption = 'cbxSkipTagBeauty'
Checked = True
State = cbChecked
TabOrder = 13
Visible = False
OnClick = cbxConvertToXHTMLClick
end
object cbxLowerCaseTags: TCheckBox
Left = 273
Top = 88
Width = 232
Height = 17
Caption = 'cbxLowerCaseTags'
TabOrder = 14
end
object cbxLowerCaseAttributes: TCheckBox
Left = 273
Top = 112
Width = 232
Height = 17
Caption = 'cbxLowerCaseAttributes'
TabOrder = 15
end
object cbxQuotedValues: TCheckBox
Left = 273
Top = 136
Width = 232
Height = 17
Caption = 'cbxQuotedValues'
TabOrder = 16
end
end
object tsConversion: TcxTabSheet
Caption = 'tsConversion'
ImageIndex = 2
object RadioConvert: TRadioGroup
Left = 8
Top = 16
Width = 234
Height = 65
HelpContext = 1225
Items.Strings = (
'1'
'2')
TabOrder = 0
OnClick = RadioConvertClick
end
object cbunicode: TCheckBox
Left = 8
Top = 84
Width = 233
Height = 17
HelpContext = 698
Caption = 'cbunicode'
TabOrder = 1
end
object cbxDontConvertAlphabet: TCheckBox
Left = 8
Top = 105
Width = 236
Height = 17
Caption = 'cbxDontConvertAlphabet'
Checked = True
State = cbChecked
TabOrder = 2
end
object cbxSkipHTMLTagsConv: TCheckBox
Left = 272
Top = 101
Width = 241
Height = 17
Caption = 'cbxSkipHTMLTagsConv'
TabOrder = 3
end
object cbxSkipScriptConv: TCheckBox
Left = 272
Top = 122
Width = 229
Height = 17
Caption = 'cbxSkipScriptConv'
Checked = True
State = cbChecked
TabOrder = 4
OnClick = cbxSkipTagCompressClick
end
object cbxSkipTagConv: TCheckBox
Left = 272
Top = 143
Width = 233
Height = 17
Caption = 'cbxSkipTagConv'
Checked = True
State = cbChecked
TabOrder = 5
OnClick = cbxSkipTagConvClick
end
object cbxSkipStringsConv: TCheckBox
Left = 290
Top = 163
Width = 216
Height = 17
Caption = 'cbxSkipStringsConv'
Checked = True
Enabled = False
State = cbChecked
TabOrder = 6
end
end
object tsFileConversion: TcxTabSheet
Caption = 'tsFileConversion'
ImageIndex = 3
object lblAttr: TLabel
Left = 303
Top = 58
Width = 92
Height = 13
Caption = 'Attributes to check:'
FocusControl = lbxAttr
end
object lbxAttr: TListBox
Left = 303
Top = 72
Width = 113
Height = 80
ItemHeight = 13
Items.Strings = (
'href'
'src')
TabOrder = 1
OnClick = lbxAttrClick
end
object BtnAddAttribute: TButton
Left = 424
Top = 72
Width = 67
Height = 22
Caption = 'Add'
TabOrder = 2
OnClick = BtnAddAttributeClick
end
object btnRemove: TButton
Left = 424
Top = 100
Width = 67
Height = 22
Caption = 'Remove'
TabOrder = 3
OnClick = btnRemoveClick
end
object btnRestore: TButton
Left = 424
Top = 128
Width = 67
Height = 22
Caption = 'Restore'
TabOrder = 4
OnClick = btnRestoreClick
end
object rgConversionSlash: TRadioGroup
Left = 8
Top = 97
Width = 257
Height = 82
Items.Strings = (
'1'
'2'
'3')
TabOrder = 0
end
object cbxApplyToFile: TCheckBox
Left = 303
Top = 154
Width = 186
Height = 17
Caption = 'cbxApplyToFile'
TabOrder = 5
end
object RBFileNameCaseConvert: TRadioGroup
Left = 8
Top = 8
Width = 257
Height = 82
Caption = 'RBFileNameCaseConvert'
TabOrder = 6
OnClick = RBFileNameCaseConvertClick
end
end
end
object Panel1: TPanel
Left = 525
Top = 0
Width = 107
Height = 231
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object BtnStart: TButton
Left = 8
Top = 9
Width = 92
Height = 25
Caption = 'Optimize'
TabOrder = 0
OnClick = BtnStartClick
end
object BtnOk: TButton
Left = 8
Top = 143
Width = 92
Height = 25
Cancel = True
Default = True
TabOrder = 2
OnClick = BtnOkClick
end
object BtnHelp: TButton
Left = 8
Top = 171
Width = 92
Height = 25
TabOrder = 3
OnClick = BtnHelpClick
end
object BtnStop: TButton
Left = 8
Top = 37
Width = 92
Height = 25
TabOrder = 1
OnClick = BtnStopClick
end
end
object statusBar: TdxStatusBar
Left = 0
Top = 231
Width = 632
Height = 20
Panels = <
item
PanelStyleClassName = 'TdxStatusBarTextPanelStyle'
Width = 200
end
item
PanelStyleClassName = 'TdxStatusBarContainerPanelStyle'
PanelStyle.Container = dxStatusBar1Container1
Width = 300
end>
PaintStyle = stpsUseLookAndFeel
LookAndFeel.Kind = lfStandard
LookAndFeel.NativeStyle = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
object dxStatusBar1Container1: TdxStatusBarContainerControl
Left = 205
Top = 2
Width = 411
Height = 18
object PgsBar: TcxProgressBar
Left = 0
Top = 0
Align = alClient
AutoSize = False
ParentFont = False
Properties.BarStyle = cxbsLEDs
Properties.ShowText = False
Properties.ShowTextStyle = cxtsPosition
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 0
Visible = False
ExplicitWidth = 427
Height = 18
Width = 411
end
end
end
end
object pcType: TcxPageControl
Left = 0
Top = 0
Width = 632
Height = 190
ActivePage = tsDocument
Align = alClient
Style = 3
TabOrder = 1
ClientRectBottom = 190
ClientRectRight = 632
ClientRectTop = 23
object tsDocument: TcxTabSheet
Caption = 'tsDocument'
object SynMemo: TSyntaxMemo
Left = 5
Top = 0
Width = 518
Height = 167
ClipCopyFormats = [smTEXT, smRTF]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Courier New'
Font.Style = []
GutterFont.Charset = DEFAULT_CHARSET
GutterFont.Color = clWindowText
GutterFont.Height = -11
GutterFont.Name = 'MS Sans Serif'
GutterFont.Style = []
HyperCursor = crDefault
IndentStep = 1
Margin = 2
Modified = False
MonoPrint = True
Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoProcessDroppedFiles, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack, smoUseTAB, smoSmartFill, smoOLEDragSource]
PopupMenu = PopupMenu
ReadOnly = False
RightMargin = 80
SaveFormat = sfTEXT
ScrollBars = ssBoth
SelLineStyle = lsCRLF
SelStart = 0
SelLength = 0
SelTextColor = clWhite
SelTextBack = clNavy
TabDefault = 4
TabOrder = 0
Version = '3.00.39'
VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
WrapAtColumn = 2048
CanMoveGutter = False
OnEnter = SynMemoEnter
OnExit = SynMemoExit
ActiveParser = 1
end
object Panel2: TPanel
Left = 523
Top = 0
Width = 109
Height = 167
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object lblCurrentDoc: TLabel
Left = 26
Top = 106
Width = 79
Height = 54
AutoSize = False
Caption = 'Appliquer au Document courant ouvert'
FocusControl = cbCurrentDoc
WordWrap = True
OnClick = lblCurrentDocClick
end
object btnOpen: TButton
Left = 8
Top = 1
Width = 92
Height = 25
Caption = 'Open'
TabOrder = 0
OnClick = btnOpenClick
end
object btnSave: TButton
Left = 8
Top = 33
Width = 92
Height = 25
Caption = 'Save'
TabOrder = 1
OnClick = btnSaveClick
end
object cbCurrentDoc: TCheckBox
Left = 8
Top = 104
Width = 17
Height = 17
TabOrder = 2
OnClick = cbCurrentDocClick
end
end
end
object tsOptions: TcxTabSheet
Caption = 'tsOptions'
ImageIndex = 1
object GroupFiles: TGroupBox
Left = 273
Top = 10
Width = 246
Height = 148
TabOrder = 0
Visible = False
object lblListeFichiers: TLabel
Left = 8
Top = 21
Width = 3
Height = 13
end
object ListFiles: TListBox
Left = 8
Top = 18
Width = 230
Height = 99
HelpContext = 1191
ItemHeight = 13
TabOrder = 0
end
object BtnAdd: TButton
Left = 15
Top = 122
Width = 68
Height = 20
HelpContext = 1070
TabOrder = 1
OnClick = BtnAddClick
end
object BtnDelete: TButton
Left = 89
Top = 122
Width = 68
Height = 20
HelpContext = 1071
Enabled = False
TabOrder = 2
OnClick = BtnDeleteClick
end
object BtnClear: TButton
Left = 163
Top = 122
Width = 68
Height = 20
HelpContext = 1072
Enabled = False
TabOrder = 3
OnClick = BtnClearClick
end
end
object grpboxDirOptions: TGroupBox
Left = 273
Top = 10
Width = 247
Height = 148
TabOrder = 1
object lblFileMasks: TLabel
Left = 8
Top = 85
Width = 3
Height = 13
end
object lblSearchDir: TLabel
Left = 8
Top = 20
Width = 3
Height = 13
end
object comboFileMasks: TComboBox
Left = 8
Top = 99
Width = 201
Height = 21
HelpContext = 911
ItemHeight = 13
TabOrder = 3
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6')
end
object chkboxSubDir: TCheckBox
Left = 16
Top = 59
Width = 207
Height = 17
HelpContext = 912
TabOrder = 2
end
object comboDir: TComboBox
Left = 8
Top = 35
Width = 201
Height = 21
HelpContext = 910
ItemHeight = 13
TabOrder = 0
end
object btnBrowse: TBitBtn
Left = 217
Top = 35
Width = 23
Height = 21
HelpContext = 910
TabOrder = 1
OnClick = btnBrowseClick
end
end
object GroupBoxWhere: TGroupBox
Left = 8
Top = 69
Width = 255
Height = 89
TabOrder = 2
object RadioProject: TRadioButton
Left = 8
Top = 29
Width = 220
Height = 17
HelpContext = 908
Enabled = False
TabOrder = 1
OnClick = RadioFilesClick
end
object RadioSpecified: TRadioButton
Left = 8
Top = 44
Width = 220
Height = 17
HelpContext = 909
Checked = True
TabOrder = 2
TabStop = True
OnClick = RadioFilesClick
end
object RadioFiles: TRadioButton
Left = 8
Top = 14
Width = 220
Height = 17
HelpContext = 907
TabOrder = 0
OnClick = RadioFilesClick
end
object RadioAllOpen: TRadioButton
Left = 8
Top = 59
Width = 220
Height = 17
TabOrder = 3
OnClick = RadioFilesClick
end
end
object gbOptions: TGroupBox
Left = 8
Top = 10
Width = 255
Height = 54
TabOrder = 3
object chkboxBackup: TCheckBox
Left = 8
Top = 14
Width = 220
Height = 17
HelpContext = 1210
TabOrder = 0
end
object cbApplyOpenFiles: TCheckBox
Left = 8
Top = 31
Width = 220
Height = 17
Checked = True
State = cbChecked
TabOrder = 1
end
end
end
end
object PopupMenu: TPopupMenu
Images = frmTop.ilmenu
Left = 548
Top = 92
object mnuUndo: TMenuItem
ImageIndex = 5
ShortCut = 16474
OnClick = mnuUndoClick
end
object mnuRedo: TMenuItem
ImageIndex = 6
ShortCut = 24666
OnClick = mnuRedoClick
end
object N1: TMenuItem
Caption = '-'
end
object mnuCut: TMenuItem
ImageIndex = 7
ShortCut = 16472
OnClick = mnuCutClick
end
object mnuCopy: TMenuItem
ImageIndex = 8
ShortCut = 16451
OnClick = mnuCopyClick
end
object mnuPaste: TMenuItem
ImageIndex = 9
ShortCut = 16470
OnClick = mnuPasteClick
end
object mnuDelete: TMenuItem
ShortCut = 16430
OnClick = mnuDeleteClick
end
object N2: TMenuItem
Caption = '-'
end
object mnuSelectAll: TMenuItem
ShortCut = 16449
OnClick = mnuSelectAllClick
end
end
end